(perl-indent-command): Fix backwards conditional.

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index 14ee573ecb18af48116d583aa49bf47915f54179..707ec7d034fa27d7ead39ce24bc301650b7a98fe 100644 (file)
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -319,7 +319,7 @@ possible action from the following list:
   (if arg                              ; If arg, just indent this line
       (perl-indent-line "\f")
     (if (and (not perl-tab-always-indent)
-            (<= (current-column) (current-indentation)))
+            (> (current-column) (current-indentation)))
        (insert-tab)
       (let (bof lsexp delta (oldpnt (point)))
        (beginning-of-line)